<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><link rel="stylesheet" type="text/css" href="style.css" /><script type="text/javascript" src="highlight.js"></script></head><body><pre><span class="hs-pragma">{-# LANGUAGE CPP, MagicHash #-}</span><span>
</span><span id="line-2"></span><span class="hs-pragma">{-# OPTIONS_GHC -funbox-strict-fields #-}</span><span>
</span><span id="line-3"></span><span class="hs-comment">--</span><span>
</span><span id="line-4"></span><span class="hs-comment">--  (c) The University of Glasgow 2002-2006</span><span>
</span><span id="line-5"></span><span class="hs-comment">--</span><span>
</span><span id="line-6"></span><span>
</span><span id="line-7"></span><span class="hs-comment">-- | Bytecode instruction definitions</span><span>
</span><span id="line-8"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">GHC.ByteCode.Instr</span><span> </span><span class="hs-special">(</span><span>
</span><span id="line-9"></span><span>        </span><span class="annot"><a href="GHC.ByteCode.Instr.html#BCInstr"><span class="hs-identifier">BCInstr</span></a></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#ProtoBCO"><span class="hs-identifier">ProtoBCO</span></a></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier">bciStackUse</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-10"></span><span>  </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span class="hs-cpp">

#include &quot;HsVersions.h&quot;
</span><span>
</span><span id="line-14"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Prelude.html"><span class="hs-identifier">GHC.Prelude</span></a></span><span>
</span><span id="line-15"></span><span>
</span><span id="line-16"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.ByteCode.Types.html"><span class="hs-identifier">GHC.ByteCode.Types</span></a></span><span>
</span><span id="line-17"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="../../ghci/src/GHCi.RemoteTypes.html#"><span class="hs-identifier">GHCi.RemoteTypes</span></a></span><span>
</span><span id="line-18"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="../../ghci/src/GHCi.FFI.html#"><span class="hs-identifier">GHCi.FFI</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="../../ghci/src/GHCi.FFI.html#C_ffi_cif"><span class="hs-identifier">C_ffi_cif</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-19"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.StgToCmm.Layout.html"><span class="hs-identifier">GHC.StgToCmm.Layout</span></a></span><span>     </span><span class="hs-special">(</span><span> </span><span class="annot"><a href="GHC.StgToCmm.ArgRep.html#ArgRep"><span class="hs-identifier">ArgRep</span></a></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span> </span><span class="hs-special">)</span><span>
</span><span id="line-20"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Core.Ppr.html"><span class="hs-identifier">GHC.Core.Ppr</span></a></span><span>
</span><span id="line-21"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Utils.Outputable.html"><span class="hs-identifier">GHC.Utils.Outputable</span></a></span><span>
</span><span id="line-22"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Data.FastString.html"><span class="hs-identifier">GHC.Data.FastString</span></a></span><span>
</span><span id="line-23"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Types.Name.html"><span class="hs-identifier">GHC.Types.Name</span></a></span><span>
</span><span id="line-24"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Types.Unique.html"><span class="hs-identifier">GHC.Types.Unique</span></a></span><span>
</span><span id="line-25"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Types.Id.html"><span class="hs-identifier">GHC.Types.Id</span></a></span><span>
</span><span id="line-26"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Core.html"><span class="hs-identifier">GHC.Core</span></a></span><span>
</span><span id="line-27"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Types.Literal.html"><span class="hs-identifier">GHC.Types.Literal</span></a></span><span>
</span><span id="line-28"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Core.DataCon.html"><span class="hs-identifier">GHC.Core.DataCon</span></a></span><span>
</span><span id="line-29"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Types.Var.Set.html"><span class="hs-identifier">GHC.Types.Var.Set</span></a></span><span>
</span><span id="line-30"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Builtin.PrimOps.html"><span class="hs-identifier">GHC.Builtin.PrimOps</span></a></span><span>
</span><span id="line-31"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="GHC.Runtime.Heap.Layout.html"><span class="hs-identifier">GHC.Runtime.Heap.Layout</span></a></span><span>
</span><span id="line-32"></span><span>
</span><span id="line-33"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="../../base/src/Data.Word.html#"><span class="hs-identifier">Data.Word</span></a></span><span>
</span><span id="line-34"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="../../base/src/GHC.Stack.CCS.html#"><span class="hs-identifier">GHC.Stack.CCS</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="../../base/src/GHC.Stack.CCS.html#CostCentre"><span class="hs-identifier">CostCentre</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-35"></span><span>
</span><span id="line-36"></span><span class="hs-comment">-- ----------------------------------------------------------------------------</span><span>
</span><span id="line-37"></span><span class="hs-comment">-- Bytecode instructions</span><span>
</span><span id="line-38"></span><span>
</span><span id="line-39"></span><span class="hs-keyword">data</span><span> </span><span id="ProtoBCO"><span class="annot"><a href="GHC.ByteCode.Instr.html#ProtoBCO"><span class="hs-identifier hs-var">ProtoBCO</span></a></span></span><span> </span><span id="local-6989586621681055169"><span class="annot"><a href="#local-6989586621681055169"><span class="hs-identifier hs-type">a</span></a></span></span><span>
</span><span id="line-40"></span><span>   </span><span class="hs-glyph">=</span><span> </span><span id="ProtoBCO"><span class="annot"><a href="GHC.ByteCode.Instr.html#ProtoBCO"><span class="hs-identifier hs-var">ProtoBCO</span></a></span></span><span> </span><span class="hs-special">{</span><span>
</span><span id="line-41"></span><span>        </span><span id="protoBCOName"><span class="annot"><span class="annottext">forall a. ProtoBCO a -&gt; a
</span><a href="GHC.ByteCode.Instr.html#protoBCOName"><span class="hs-identifier hs-var hs-var">protoBCOName</span></a></span></span><span>       </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621681055169"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">,</span><span>          </span><span class="hs-comment">-- name, in some sense</span><span>
</span><span id="line-42"></span><span>        </span><span id="protoBCOInstrs"><span class="annot"><span class="annottext">forall a. ProtoBCO a -&gt; [BCInstr]
</span><a href="GHC.ByteCode.Instr.html#protoBCOInstrs"><span class="hs-identifier hs-var hs-var">protoBCOInstrs</span></a></span></span><span>     </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="annot"><a href="GHC.ByteCode.Instr.html#BCInstr"><span class="hs-identifier hs-type">BCInstr</span></a></span><span class="hs-special">]</span><span class="hs-special">,</span><span>  </span><span class="hs-comment">-- instrs</span><span>
</span><span id="line-43"></span><span>        </span><span class="hs-comment">-- arity and GC info</span><span>
</span><span id="line-44"></span><span>        </span><span id="protoBCOBitmap"><span class="annot"><span class="annottext">forall a. ProtoBCO a -&gt; [StgWord]
</span><a href="GHC.ByteCode.Instr.html#protoBCOBitmap"><span class="hs-identifier hs-var hs-var">protoBCOBitmap</span></a></span></span><span>     </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="annot"><a href="GHC.Runtime.Heap.Layout.html#StgWord"><span class="hs-identifier hs-type">StgWord</span></a></span><span class="hs-special">]</span><span class="hs-special">,</span><span>
</span><span id="line-45"></span><span>        </span><span id="protoBCOBitmapSize"><span class="annot"><span class="annottext">forall a. ProtoBCO a -&gt; Word16
</span><a href="GHC.ByteCode.Instr.html#protoBCOBitmapSize"><span class="hs-identifier hs-var hs-var">protoBCOBitmapSize</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span class="hs-special">,</span><span>
</span><span id="line-46"></span><span>        </span><span id="protoBCOArity"><span class="annot"><span class="annottext">forall a. ProtoBCO a -&gt; Int
</span><a href="GHC.ByteCode.Instr.html#protoBCOArity"><span class="hs-identifier hs-var hs-var">protoBCOArity</span></a></span></span><span>      </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Int</span></span><span class="hs-special">,</span><span>
</span><span id="line-47"></span><span>        </span><span class="hs-comment">-- what the BCO came from, for debugging only</span><span>
</span><span id="line-48"></span><span>        </span><span id="protoBCOExpr"><span class="annot"><span class="annottext">forall a.
ProtoBCO a
-&gt; Either [AnnAlt CoreBndr DVarSet] (AnnExpr CoreBndr DVarSet)
</span><a href="GHC.ByteCode.Instr.html#protoBCOExpr"><span class="hs-identifier hs-var hs-var">protoBCOExpr</span></a></span></span><span>       </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="../../base/src/Data.Either.html#Either"><span class="hs-identifier hs-type">Either</span></a></span><span>  </span><span class="hs-special">[</span><span class="annot"><a href="GHC.Core.html#AnnAlt"><span class="hs-identifier hs-type">AnnAlt</span></a></span><span> </span><span class="annot"><a href="GHC.Types.Var.html#Id"><span class="hs-identifier hs-type">Id</span></a></span><span> </span><span class="annot"><a href="GHC.Types.Var.Set.html#DVarSet"><span class="hs-identifier hs-type">DVarSet</span></a></span><span class="hs-special">]</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.Core.html#AnnExpr"><span class="hs-identifier hs-type">AnnExpr</span></a></span><span> </span><span class="annot"><a href="GHC.Types.Var.html#Id"><span class="hs-identifier hs-type">Id</span></a></span><span> </span><span class="annot"><a href="GHC.Types.Var.Set.html#DVarSet"><span class="hs-identifier hs-type">DVarSet</span></a></span><span class="hs-special">)</span><span class="hs-special">,</span><span>
</span><span id="line-49"></span><span>        </span><span class="hs-comment">-- malloc'd pointers</span><span>
</span><span id="line-50"></span><span>        </span><span id="protoBCOFFIs"><span class="annot"><span class="annottext">forall a. ProtoBCO a -&gt; [FFIInfo]
</span><a href="GHC.ByteCode.Instr.html#protoBCOFFIs"><span class="hs-identifier hs-var hs-var">protoBCOFFIs</span></a></span></span><span>       </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="annot"><a href="GHC.ByteCode.Types.html#FFIInfo"><span class="hs-identifier hs-type">FFIInfo</span></a></span><span class="hs-special">]</span><span>
</span><span id="line-51"></span><span>   </span><span class="hs-special">}</span><span>
</span><span id="line-52"></span><span>
</span><span id="line-53"></span><span class="hs-keyword">type</span><span> </span><span id="LocalLabel"><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-var">LocalLabel</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span>
</span><span id="line-54"></span><span>
</span><span id="line-55"></span><span class="hs-keyword">data</span><span> </span><span id="BCInstr"><span class="annot"><a href="GHC.ByteCode.Instr.html#BCInstr"><span class="hs-identifier hs-var">BCInstr</span></a></span></span><span>
</span><span id="line-56"></span><span>   </span><span class="hs-comment">-- Messing with the stack</span><span>
</span><span id="line-57"></span><span>   </span><span class="hs-glyph">=</span><span> </span><span id="STKCHECK"><span class="annot"><a href="GHC.ByteCode.Instr.html#STKCHECK"><span class="hs-identifier hs-var">STKCHECK</span></a></span></span><span>  </span><span class="annot"><span class="hs-identifier hs-type">Word</span></span><span>
</span><span id="line-58"></span><span>
</span><span id="line-59"></span><span>   </span><span class="hs-comment">-- Push locals (existing bits of the stack)</span><span>
</span><span id="line-60"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_L"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_L"><span class="hs-identifier hs-var">PUSH_L</span></a></span></span><span>    </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span class="hs-comment">{-offset-}</span><span>
</span><span id="line-61"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_LL"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_LL"><span class="hs-identifier hs-var">PUSH_LL</span></a></span></span><span>   </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span class="hs-comment">{-2 offsets-}</span><span>
</span><span id="line-62"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_LLL"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_LLL"><span class="hs-identifier hs-var">PUSH_LLL</span></a></span></span><span>  </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span class="hs-comment">{-3 offsets-}</span><span>
</span><span id="line-63"></span><span>
</span><span id="line-64"></span><span>   </span><span class="hs-comment">-- Push the specified local as a 8, 16, 32 bit value onto the stack. (i.e.,</span><span>
</span><span id="line-65"></span><span>   </span><span class="hs-comment">-- the stack will grow by 8, 16 or 32 bits)</span><span>
</span><span id="line-66"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH8"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH8"><span class="hs-identifier hs-var">PUSH8</span></a></span></span><span>  </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span>
</span><span id="line-67"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH16"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH16"><span class="hs-identifier hs-var">PUSH16</span></a></span></span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span>
</span><span id="line-68"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH32"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH32"><span class="hs-identifier hs-var">PUSH32</span></a></span></span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span>
</span><span id="line-69"></span><span>
</span><span id="line-70"></span><span>   </span><span class="hs-comment">-- Push the specifiec local as a 8, 16, 32 bit value onto the stack, but the</span><span>
</span><span id="line-71"></span><span>   </span><span class="hs-comment">-- value will take the whole word on the stack (i.e., the stack will grow by</span><span>
</span><span id="line-72"></span><span>   </span><span class="hs-comment">-- a word)</span><span>
</span><span id="line-73"></span><span>   </span><span class="hs-comment">-- This is useful when extracting a packed constructor field for further use.</span><span>
</span><span id="line-74"></span><span>   </span><span class="hs-comment">-- Currently we expect all values on the stack to take full words, except for</span><span>
</span><span id="line-75"></span><span>   </span><span class="hs-comment">-- the ones used for PACK (i.e., actually constracting new data types, in</span><span>
</span><span id="line-76"></span><span>   </span><span class="hs-comment">-- which case we use PUSH{8,16,32})</span><span>
</span><span id="line-77"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH8_W"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH8_W"><span class="hs-identifier hs-var">PUSH8_W</span></a></span></span><span>  </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span>
</span><span id="line-78"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH16_W"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH16_W"><span class="hs-identifier hs-var">PUSH16_W</span></a></span></span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span>
</span><span id="line-79"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH32_W"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH32_W"><span class="hs-identifier hs-var">PUSH32_W</span></a></span></span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span>
</span><span id="line-80"></span><span>
</span><span id="line-81"></span><span>   </span><span class="hs-comment">-- Push a ptr  (these all map to PUSH_G really)</span><span>
</span><span id="line-82"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_G"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_G"><span class="hs-identifier hs-var">PUSH_G</span></a></span></span><span>       </span><span class="annot"><a href="GHC.Types.Name.html#Name"><span class="hs-identifier hs-type">Name</span></a></span><span>
</span><span id="line-83"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_PRIMOP"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_PRIMOP"><span class="hs-identifier hs-var">PUSH_PRIMOP</span></a></span></span><span>  </span><span class="annot"><a href="GHC.Builtin.PrimOps.html#PrimOp"><span class="hs-identifier hs-type">PrimOp</span></a></span><span>
</span><span id="line-84"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_BCO"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_BCO"><span class="hs-identifier hs-var">PUSH_BCO</span></a></span></span><span>     </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#ProtoBCO"><span class="hs-identifier hs-type">ProtoBCO</span></a></span><span> </span><span class="annot"><a href="GHC.Types.Name.html#Name"><span class="hs-identifier hs-type">Name</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-85"></span><span>
</span><span id="line-86"></span><span>   </span><span class="hs-comment">-- Push an alt continuation</span><span>
</span><span id="line-87"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_ALTS"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_ALTS"><span class="hs-identifier hs-var">PUSH_ALTS</span></a></span></span><span>          </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#ProtoBCO"><span class="hs-identifier hs-type">ProtoBCO</span></a></span><span> </span><span class="annot"><a href="GHC.Types.Name.html#Name"><span class="hs-identifier hs-type">Name</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-88"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_ALTS_UNLIFTED"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_ALTS_UNLIFTED"><span class="hs-identifier hs-var">PUSH_ALTS_UNLIFTED</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#ProtoBCO"><span class="hs-identifier hs-type">ProtoBCO</span></a></span><span> </span><span class="annot"><a href="GHC.Types.Name.html#Name"><span class="hs-identifier hs-type">Name</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><a href="GHC.StgToCmm.ArgRep.html#ArgRep"><span class="hs-identifier hs-type">ArgRep</span></a></span><span>
</span><span id="line-89"></span><span>
</span><span id="line-90"></span><span>   </span><span class="hs-comment">-- Pushing 8, 16 and 32 bits of padding (for constructors).</span><span>
</span><span id="line-91"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_PAD8"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_PAD8"><span class="hs-identifier hs-var">PUSH_PAD8</span></a></span></span><span>
</span><span id="line-92"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_PAD16"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_PAD16"><span class="hs-identifier hs-var">PUSH_PAD16</span></a></span></span><span>
</span><span id="line-93"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_PAD32"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_PAD32"><span class="hs-identifier hs-var">PUSH_PAD32</span></a></span></span><span>
</span><span id="line-94"></span><span>
</span><span id="line-95"></span><span>   </span><span class="hs-comment">-- Pushing literals</span><span>
</span><span id="line-96"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_UBX8"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_UBX8"><span class="hs-identifier hs-var">PUSH_UBX8</span></a></span></span><span>  </span><span class="annot"><a href="GHC.Types.Literal.html#Literal"><span class="hs-identifier hs-type">Literal</span></a></span><span>
</span><span id="line-97"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_UBX16"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_UBX16"><span class="hs-identifier hs-var">PUSH_UBX16</span></a></span></span><span> </span><span class="annot"><a href="GHC.Types.Literal.html#Literal"><span class="hs-identifier hs-type">Literal</span></a></span><span>
</span><span id="line-98"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_UBX32"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_UBX32"><span class="hs-identifier hs-var">PUSH_UBX32</span></a></span></span><span> </span><span class="annot"><a href="GHC.Types.Literal.html#Literal"><span class="hs-identifier hs-type">Literal</span></a></span><span>
</span><span id="line-99"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_UBX"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_UBX"><span class="hs-identifier hs-var">PUSH_UBX</span></a></span></span><span>   </span><span class="annot"><a href="GHC.Types.Literal.html#Literal"><span class="hs-identifier hs-type">Literal</span></a></span><span> </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span>
</span><span id="line-100"></span><span>        </span><span class="hs-comment">-- push this int/float/double/addr, on the stack. Word16</span><span>
</span><span id="line-101"></span><span>        </span><span class="hs-comment">-- is # of words to copy from literal pool.  Eitherness reflects</span><span>
</span><span id="line-102"></span><span>        </span><span class="hs-comment">-- the difficulty of dealing with MachAddr here, mostly due to</span><span>
</span><span id="line-103"></span><span>        </span><span class="hs-comment">-- the excessive (and unnecessary) restrictions imposed by the</span><span>
</span><span id="line-104"></span><span>        </span><span class="hs-comment">-- designers of the new Foreign library.  In particular it is</span><span>
</span><span id="line-105"></span><span>        </span><span class="hs-comment">-- quite impossible to convert an Addr to any other integral</span><span>
</span><span id="line-106"></span><span>        </span><span class="hs-comment">-- type, and it appears impossible to get hold of the bits of</span><span>
</span><span id="line-107"></span><span>        </span><span class="hs-comment">-- an addr, even though we need to assemble BCOs.</span><span>
</span><span id="line-108"></span><span>
</span><span id="line-109"></span><span>   </span><span class="hs-comment">-- various kinds of application</span><span>
</span><span id="line-110"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_APPLY_N"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_N"><span class="hs-identifier hs-var">PUSH_APPLY_N</span></a></span></span><span>
</span><span id="line-111"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_APPLY_V"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_V"><span class="hs-identifier hs-var">PUSH_APPLY_V</span></a></span></span><span>
</span><span id="line-112"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_APPLY_F"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_F"><span class="hs-identifier hs-var">PUSH_APPLY_F</span></a></span></span><span>
</span><span id="line-113"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_APPLY_D"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_D"><span class="hs-identifier hs-var">PUSH_APPLY_D</span></a></span></span><span>
</span><span id="line-114"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_APPLY_L"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_L"><span class="hs-identifier hs-var">PUSH_APPLY_L</span></a></span></span><span>
</span><span id="line-115"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_APPLY_P"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_P"><span class="hs-identifier hs-var">PUSH_APPLY_P</span></a></span></span><span>
</span><span id="line-116"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_APPLY_PP"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PP"><span class="hs-identifier hs-var">PUSH_APPLY_PP</span></a></span></span><span>
</span><span id="line-117"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_APPLY_PPP"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PPP"><span class="hs-identifier hs-var">PUSH_APPLY_PPP</span></a></span></span><span>
</span><span id="line-118"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_APPLY_PPPP"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PPPP"><span class="hs-identifier hs-var">PUSH_APPLY_PPPP</span></a></span></span><span>
</span><span id="line-119"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_APPLY_PPPPP"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PPPPP"><span class="hs-identifier hs-var">PUSH_APPLY_PPPPP</span></a></span></span><span>
</span><span id="line-120"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PUSH_APPLY_PPPPPP"><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PPPPPP"><span class="hs-identifier hs-var">PUSH_APPLY_PPPPPP</span></a></span></span><span>
</span><span id="line-121"></span><span>
</span><span id="line-122"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="SLIDE"><span class="annot"><a href="GHC.ByteCode.Instr.html#SLIDE"><span class="hs-identifier hs-var">SLIDE</span></a></span></span><span>     </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span class="hs-comment">{-this many-}</span><span> </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span class="hs-comment">{-down by this much-}</span><span>
</span><span id="line-123"></span><span>
</span><span id="line-124"></span><span>   </span><span class="hs-comment">-- To do with the heap</span><span>
</span><span id="line-125"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="ALLOC_AP"><span class="annot"><a href="GHC.ByteCode.Instr.html#ALLOC_AP"><span class="hs-identifier hs-var">ALLOC_AP</span></a></span></span><span>  </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="hs-comment">-- make an AP with this many payload words</span><span>
</span><span id="line-126"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="ALLOC_AP_NOUPD"><span class="annot"><a href="GHC.ByteCode.Instr.html#ALLOC_AP_NOUPD"><span class="hs-identifier hs-var">ALLOC_AP_NOUPD</span></a></span></span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="hs-comment">-- make an AP_NOUPD with this many payload words</span><span>
</span><span id="line-127"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="ALLOC_PAP"><span class="annot"><a href="GHC.ByteCode.Instr.html#ALLOC_PAP"><span class="hs-identifier hs-var">ALLOC_PAP</span></a></span></span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="hs-comment">-- make a PAP with this arity / payload words</span><span>
</span><span id="line-128"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="MKAP"><span class="annot"><a href="GHC.ByteCode.Instr.html#MKAP"><span class="hs-identifier hs-var">MKAP</span></a></span></span><span>      </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span class="hs-comment">{-ptr to AP is this far down stack-}</span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span class="hs-comment">{-number of words-}</span><span>
</span><span id="line-129"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="MKPAP"><span class="annot"><a href="GHC.ByteCode.Instr.html#MKPAP"><span class="hs-identifier hs-var">MKPAP</span></a></span></span><span>     </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span class="hs-comment">{-ptr to PAP is this far down stack-}</span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span class="hs-comment">{-number of words-}</span><span>
</span><span id="line-130"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="UNPACK"><span class="annot"><a href="GHC.ByteCode.Instr.html#UNPACK"><span class="hs-identifier hs-var">UNPACK</span></a></span></span><span>    </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="hs-comment">-- unpack N words from t.o.s Constr</span><span>
</span><span id="line-131"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="PACK"><span class="annot"><a href="GHC.ByteCode.Instr.html#PACK"><span class="hs-identifier hs-var">PACK</span></a></span></span><span>      </span><span class="annot"><a href="GHC.Core.DataCon.html#DataCon"><span class="hs-identifier hs-type">DataCon</span></a></span><span> </span><span class="hs-glyph">!</span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span>
</span><span id="line-132"></span><span>                        </span><span class="hs-comment">-- after assembly, the DataCon is an index into the</span><span>
</span><span id="line-133"></span><span>                        </span><span class="hs-comment">-- itbl array</span><span>
</span><span id="line-134"></span><span>   </span><span class="hs-comment">-- For doing case trees</span><span>
</span><span id="line-135"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="LABEL"><span class="annot"><a href="GHC.ByteCode.Instr.html#LABEL"><span class="hs-identifier hs-var">LABEL</span></a></span></span><span>     </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-type">LocalLabel</span></a></span><span>
</span><span id="line-136"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="TESTLT_I"><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_I"><span class="hs-identifier hs-var">TESTLT_I</span></a></span></span><span>  </span><span class="annot"><span class="hs-identifier hs-type">Int</span></span><span>    </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-type">LocalLabel</span></a></span><span>
</span><span id="line-137"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="TESTEQ_I"><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_I"><span class="hs-identifier hs-var">TESTEQ_I</span></a></span></span><span>  </span><span class="annot"><span class="hs-identifier hs-type">Int</span></span><span>    </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-type">LocalLabel</span></a></span><span>
</span><span id="line-138"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="TESTLT_W"><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_W"><span class="hs-identifier hs-var">TESTLT_W</span></a></span></span><span>  </span><span class="annot"><span class="hs-identifier hs-type">Word</span></span><span>   </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-type">LocalLabel</span></a></span><span>
</span><span id="line-139"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="TESTEQ_W"><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_W"><span class="hs-identifier hs-var">TESTEQ_W</span></a></span></span><span>  </span><span class="annot"><span class="hs-identifier hs-type">Word</span></span><span>   </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-type">LocalLabel</span></a></span><span>
</span><span id="line-140"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="TESTLT_F"><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_F"><span class="hs-identifier hs-var">TESTLT_F</span></a></span></span><span>  </span><span class="annot"><span class="hs-identifier hs-type">Float</span></span><span>  </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-type">LocalLabel</span></a></span><span>
</span><span id="line-141"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="TESTEQ_F"><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_F"><span class="hs-identifier hs-var">TESTEQ_F</span></a></span></span><span>  </span><span class="annot"><span class="hs-identifier hs-type">Float</span></span><span>  </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-type">LocalLabel</span></a></span><span>
</span><span id="line-142"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="TESTLT_D"><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_D"><span class="hs-identifier hs-var">TESTLT_D</span></a></span></span><span>  </span><span class="annot"><span class="hs-identifier hs-type">Double</span></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-type">LocalLabel</span></a></span><span>
</span><span id="line-143"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="TESTEQ_D"><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_D"><span class="hs-identifier hs-var">TESTEQ_D</span></a></span></span><span>  </span><span class="annot"><span class="hs-identifier hs-type">Double</span></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-type">LocalLabel</span></a></span><span>
</span><span id="line-144"></span><span>
</span><span id="line-145"></span><span>   </span><span class="hs-comment">-- The Word16 value is a constructor number and therefore</span><span>
</span><span id="line-146"></span><span>   </span><span class="hs-comment">-- stored in the insn stream rather than as an offset into</span><span>
</span><span id="line-147"></span><span>   </span><span class="hs-comment">-- the literal pool.</span><span>
</span><span id="line-148"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="TESTLT_P"><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_P"><span class="hs-identifier hs-var">TESTLT_P</span></a></span></span><span>  </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-type">LocalLabel</span></a></span><span>
</span><span id="line-149"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="TESTEQ_P"><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_P"><span class="hs-identifier hs-var">TESTEQ_P</span></a></span></span><span>  </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-type">LocalLabel</span></a></span><span>
</span><span id="line-150"></span><span>
</span><span id="line-151"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="CASEFAIL"><span class="annot"><a href="GHC.ByteCode.Instr.html#CASEFAIL"><span class="hs-identifier hs-var">CASEFAIL</span></a></span></span><span>
</span><span id="line-152"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="JMP"><span class="annot"><a href="GHC.ByteCode.Instr.html#JMP"><span class="hs-identifier hs-var">JMP</span></a></span></span><span>              </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LocalLabel"><span class="hs-identifier hs-type">LocalLabel</span></a></span><span>
</span><span id="line-153"></span><span>
</span><span id="line-154"></span><span>   </span><span class="hs-comment">-- For doing calls to C (via glue code generated by libffi)</span><span>
</span><span id="line-155"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="CCALL"><span class="annot"><a href="GHC.ByteCode.Instr.html#CCALL"><span class="hs-identifier hs-var">CCALL</span></a></span></span><span>            </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span>    </span><span class="hs-comment">-- stack frame size</span><span>
</span><span id="line-156"></span><span>                      </span><span class="hs-special">(</span><span class="annot"><a href="../../ghci/src/GHCi.RemoteTypes.html#RemotePtr"><span class="hs-identifier hs-type">RemotePtr</span></a></span><span> </span><span class="annot"><a href="../../ghci/src/GHCi.FFI.html#C_ffi_cif"><span class="hs-identifier hs-type">C_ffi_cif</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- addr of the glue code</span><span>
</span><span id="line-157"></span><span>                      </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span>    </span><span class="hs-comment">-- flags.</span><span>
</span><span id="line-158"></span><span>                                </span><span class="hs-comment">--</span><span>
</span><span id="line-159"></span><span>                                </span><span class="hs-comment">-- 0x1: call is interruptible</span><span>
</span><span id="line-160"></span><span>                                </span><span class="hs-comment">-- 0x2: call is unsafe</span><span>
</span><span id="line-161"></span><span>                                </span><span class="hs-comment">--</span><span>
</span><span id="line-162"></span><span>                                </span><span class="hs-comment">-- (XXX: inefficient, but I don't know</span><span>
</span><span id="line-163"></span><span>                                </span><span class="hs-comment">-- what the alignment constraints are.)</span><span>
</span><span id="line-164"></span><span>
</span><span id="line-165"></span><span>   </span><span class="hs-comment">-- For doing magic ByteArray passing to foreign calls</span><span>
</span><span id="line-166"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="SWIZZLE"><span class="annot"><a href="GHC.ByteCode.Instr.html#SWIZZLE"><span class="hs-identifier hs-var">SWIZZLE</span></a></span></span><span>          </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="hs-comment">-- to the ptr N words down the stack,</span><span>
</span><span id="line-167"></span><span>                      </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="hs-comment">-- add M (interpreted as a signed 16-bit entity)</span><span>
</span><span id="line-168"></span><span>
</span><span id="line-169"></span><span>   </span><span class="hs-comment">-- To Infinity And Beyond</span><span>
</span><span id="line-170"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="ENTER"><span class="annot"><a href="GHC.ByteCode.Instr.html#ENTER"><span class="hs-identifier hs-var">ENTER</span></a></span></span><span>
</span><span id="line-171"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="RETURN"><span class="annot"><a href="GHC.ByteCode.Instr.html#RETURN"><span class="hs-identifier hs-var">RETURN</span></a></span></span><span>             </span><span class="hs-comment">-- return a lifted value</span><span>
</span><span id="line-172"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="RETURN_UBX"><span class="annot"><a href="GHC.ByteCode.Instr.html#RETURN_UBX"><span class="hs-identifier hs-var">RETURN_UBX</span></a></span></span><span> </span><span class="annot"><a href="GHC.StgToCmm.ArgRep.html#ArgRep"><span class="hs-identifier hs-type">ArgRep</span></a></span><span> </span><span class="hs-comment">-- return an unlifted value, here's its rep</span><span>
</span><span id="line-173"></span><span>
</span><span id="line-174"></span><span>   </span><span class="hs-comment">-- Breakpoints</span><span>
</span><span id="line-175"></span><span>   </span><span class="hs-glyph">|</span><span> </span><span id="BRK_FUN"><span class="annot"><a href="GHC.ByteCode.Instr.html#BRK_FUN"><span class="hs-identifier hs-var">BRK_FUN</span></a></span></span><span>          </span><span class="annot"><a href="../../base/src/GHC.Word.html#Word16"><span class="hs-identifier hs-type">Word16</span></a></span><span> </span><span class="annot"><a href="GHC.Types.Unique.html#Unique"><span class="hs-identifier hs-type">Unique</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="../../ghci/src/GHCi.RemoteTypes.html#RemotePtr"><span class="hs-identifier hs-type">RemotePtr</span></a></span><span> </span><span class="annot"><a href="../../base/src/GHC.Stack.CCS.html#CostCentre"><span class="hs-identifier hs-type">CostCentre</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-176"></span><span>
</span><span id="line-177"></span><span class="hs-comment">-- -----------------------------------------------------------------------------</span><span>
</span><span id="line-178"></span><span class="hs-comment">-- Printing bytecode instructions</span><span>
</span><span id="line-179"></span><span>
</span><span id="line-180"></span><span id="local-6989586621681055154"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621681055004"><span class="annot"><a href="GHC.Utils.Outputable.html#Outputable"><span class="hs-identifier hs-type">Outputable</span></a></span><span> </span><span class="annot"><a href="#local-6989586621681055154"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="GHC.Utils.Outputable.html#Outputable"><span class="hs-identifier hs-type">Outputable</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#ProtoBCO"><span class="hs-identifier hs-type">ProtoBCO</span></a></span><span> </span><span class="annot"><a href="#local-6989586621681055154"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">)</span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-181"></span><span>   </span><span id="local-6989586621681054990"><span class="annot"><span class="annottext">ppr :: ProtoBCO a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var hs-var hs-var hs-var">ppr</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#ProtoBCO"><span class="hs-identifier hs-type">ProtoBCO</span></a></span><span> </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">protoBCOName :: forall a. ProtoBCO a -&gt; a
</span><a href="GHC.ByteCode.Instr.html#protoBCOName"><span class="hs-identifier hs-var">protoBCOName</span></a></span><span>       </span><span class="hs-glyph">=</span><span> </span><span id="local-6989586621681054988"><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621681054988"><span class="hs-identifier hs-var">name</span></a></span></span><span>
</span><span id="line-182"></span><span>                 </span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">protoBCOInstrs :: forall a. ProtoBCO a -&gt; [BCInstr]
</span><a href="GHC.ByteCode.Instr.html#protoBCOInstrs"><span class="hs-identifier hs-var">protoBCOInstrs</span></a></span><span>     </span><span class="hs-glyph">=</span><span> </span><span id="local-6989586621681054987"><span class="annot"><span class="annottext">[BCInstr]
</span><a href="#local-6989586621681054987"><span class="hs-identifier hs-var">instrs</span></a></span></span><span>
</span><span id="line-183"></span><span>                 </span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">protoBCOBitmap :: forall a. ProtoBCO a -&gt; [StgWord]
</span><a href="GHC.ByteCode.Instr.html#protoBCOBitmap"><span class="hs-identifier hs-var">protoBCOBitmap</span></a></span><span>     </span><span class="hs-glyph">=</span><span> </span><span id="local-6989586621681054986"><span class="annot"><span class="annottext">[StgWord]
</span><a href="#local-6989586621681054986"><span class="hs-identifier hs-var">bitmap</span></a></span></span><span>
</span><span id="line-184"></span><span>                 </span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">protoBCOBitmapSize :: forall a. ProtoBCO a -&gt; Word16
</span><a href="GHC.ByteCode.Instr.html#protoBCOBitmapSize"><span class="hs-identifier hs-var">protoBCOBitmapSize</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="local-6989586621681054985"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054985"><span class="hs-identifier hs-var">bsize</span></a></span></span><span>
</span><span id="line-185"></span><span>                 </span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">protoBCOArity :: forall a. ProtoBCO a -&gt; Int
</span><a href="GHC.ByteCode.Instr.html#protoBCOArity"><span class="hs-identifier hs-var">protoBCOArity</span></a></span><span>      </span><span class="hs-glyph">=</span><span> </span><span id="local-6989586621681054984"><span class="annot"><span class="annottext">Int
</span><a href="#local-6989586621681054984"><span class="hs-identifier hs-var">arity</span></a></span></span><span>
</span><span id="line-186"></span><span>                 </span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">protoBCOExpr :: forall a.
ProtoBCO a
-&gt; Either [AnnAlt CoreBndr DVarSet] (AnnExpr CoreBndr DVarSet)
</span><a href="GHC.ByteCode.Instr.html#protoBCOExpr"><span class="hs-identifier hs-var">protoBCOExpr</span></a></span><span>       </span><span class="hs-glyph">=</span><span> </span><span id="local-6989586621681054983"><span class="annot"><span class="annottext">Either [AnnAlt CoreBndr DVarSet] (AnnExpr CoreBndr DVarSet)
</span><a href="#local-6989586621681054983"><span class="hs-identifier hs-var">origin</span></a></span></span><span>
</span><span id="line-187"></span><span>                 </span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">protoBCOFFIs :: forall a. ProtoBCO a -&gt; [FFIInfo]
</span><a href="GHC.ByteCode.Instr.html#protoBCOFFIs"><span class="hs-identifier hs-var">protoBCOFFIs</span></a></span><span>       </span><span class="hs-glyph">=</span><span> </span><span id="local-6989586621681054982"><span class="annot"><span class="annottext">[FFIInfo]
</span><a href="#local-6989586621681054982"><span class="hs-identifier hs-var">ffis</span></a></span></span><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
</span><span id="line-188"></span><span>      </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;ProtoBCO&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">a -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621681054988"><span class="hs-identifier hs-var">name</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Char -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#char"><span class="hs-identifier hs-var">char</span></a></span><span> </span><span class="annot"><span class="annottext">Char
</span><span class="hs-char">'#'</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Int -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#int"><span class="hs-identifier hs-var">int</span></a></span><span> </span><span class="annot"><span class="annottext">Int
</span><a href="#local-6989586621681054984"><span class="hs-identifier hs-var">arity</span></a></span><span>
</span><span id="line-189"></span><span>                </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">[FFIInfo] -&gt; String
forall a. Show a =&gt; a -&gt; String
</span><a href="../../base/src/GHC.Show.html#show"><span class="hs-identifier hs-var">show</span></a></span><span> </span><span class="annot"><span class="annottext">[FFIInfo]
</span><a href="#local-6989586621681054982"><span class="hs-identifier hs-var">ffis</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc
</span><a href="GHC.Utils.Outputable.html#colon"><span class="hs-identifier hs-var">colon</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-190"></span><span>        </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%24%24"><span class="hs-operator hs-var">$$</span></a></span><span> </span><span class="annot"><span class="annottext">Int -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#nest"><span class="hs-identifier hs-var">nest</span></a></span><span> </span><span class="annot"><span class="annottext">Int
</span><span class="hs-number">3</span></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Either [AnnAlt CoreBndr DVarSet] (AnnExpr CoreBndr DVarSet)
</span><a href="#local-6989586621681054983"><span class="hs-identifier hs-var">origin</span></a></span><span> </span><span class="hs-keyword">of</span><span>
</span><span id="line-191"></span><span>                      </span><span class="annot"><a href="../../base/src/Data.Either.html#Left"><span class="hs-identifier hs-type">Left</span></a></span><span> </span><span id="local-6989586621681054972"><span class="annot"><span class="annottext">[AnnAlt CoreBndr DVarSet]
</span><a href="#local-6989586621681054972"><span class="hs-identifier hs-var">alts</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">[SDoc] -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#vcat"><span class="hs-identifier hs-var">vcat</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(SDoc -&gt; SDoc -&gt; SDoc) -&gt; [SDoc] -&gt; [SDoc] -&gt; [SDoc]
forall a b c. (a -&gt; b -&gt; c) -&gt; [a] -&gt; [b] -&gt; [c]
</span><a href="../../base/src/GHC.List.html#zipWith"><span class="hs-identifier hs-var">zipWith</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">(&lt;+&gt;)</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Char -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#char"><span class="hs-identifier hs-var">char</span></a></span><span> </span><span class="annot"><span class="annottext">Char
</span><span class="hs-char">'{'</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; [SDoc] -&gt; [SDoc]
forall a. a -&gt; [a] -&gt; [a]
</span><span class="hs-glyph hs-var">:</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; [SDoc]
forall a. a -&gt; [a]
</span><a href="../../base/src/GHC.List.html#repeat"><span class="hs-identifier hs-var">repeat</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Char -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#char"><span class="hs-identifier hs-var">char</span></a></span><span> </span><span class="annot"><span class="annottext">Char
</span><span class="hs-char">';'</span></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-192"></span><span>                                                       </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(AnnAlt CoreBndr DVarSet -&gt; SDoc)
-&gt; [AnnAlt CoreBndr DVarSet] -&gt; [SDoc]
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
</span><a href="../../base/src/GHC.Base.html#map"><span class="hs-identifier hs-var">map</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">CoreAlt -&gt; SDoc
</span><a href="GHC.ByteCode.Instr.html#pprCoreAltShort"><span class="hs-identifier hs-var">pprCoreAltShort</span></a></span><span class="annot"><span class="annottext">(CoreAlt -&gt; SDoc)
-&gt; (AnnAlt CoreBndr DVarSet -&gt; CoreAlt)
-&gt; AnnAlt CoreBndr DVarSet
-&gt; SDoc
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><a href="../../base/src/GHC.Base.html#."><span class="hs-operator hs-var">.</span></a></span><span class="annot"><span class="annottext">AnnAlt CoreBndr DVarSet -&gt; CoreAlt
forall bndr annot. AnnAlt bndr annot -&gt; Alt bndr
</span><a href="GHC.Core.html#deAnnAlt"><span class="hs-identifier hs-var">deAnnAlt</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">[AnnAlt CoreBndr DVarSet]
</span><a href="#local-6989586621681054972"><span class="hs-identifier hs-var">alts</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Char -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#char"><span class="hs-identifier hs-var">char</span></a></span><span> </span><span class="annot"><span class="annottext">Char
</span><span class="hs-char">'}'</span></span><span>
</span><span id="line-193"></span><span>                      </span><span class="annot"><a href="../../base/src/Data.Either.html#Right"><span class="hs-identifier hs-type">Right</span></a></span><span> </span><span id="local-6989586621681054965"><span class="annot"><span class="annottext">AnnExpr CoreBndr DVarSet
</span><a href="#local-6989586621681054965"><span class="hs-identifier hs-var">rhs</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">CoreExpr -&gt; SDoc
</span><a href="GHC.ByteCode.Instr.html#pprCoreExprShort"><span class="hs-identifier hs-var">pprCoreExprShort</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">AnnExpr CoreBndr DVarSet -&gt; CoreExpr
forall bndr annot. AnnExpr bndr annot -&gt; Expr bndr
</span><a href="GHC.Core.html#deAnnotate"><span class="hs-identifier hs-var">deAnnotate</span></a></span><span> </span><span class="annot"><span class="annottext">AnnExpr CoreBndr DVarSet
</span><a href="#local-6989586621681054965"><span class="hs-identifier hs-var">rhs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-194"></span><span>        </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%24%24"><span class="hs-operator hs-var">$$</span></a></span><span> </span><span class="annot"><span class="annottext">Int -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#nest"><span class="hs-identifier hs-var">nest</span></a></span><span> </span><span class="annot"><span class="annottext">Int
</span><span class="hs-number">3</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;bitmap: &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word16 -&gt; String
forall a. Show a =&gt; a -&gt; String
</span><a href="../../base/src/GHC.Show.html#show"><span class="hs-identifier hs-var">show</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054985"><span class="hs-identifier hs-var">bsize</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">[StgWord] -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">[StgWord]
</span><a href="#local-6989586621681054986"><span class="hs-identifier hs-var">bitmap</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-195"></span><span>        </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%24%24"><span class="hs-operator hs-var">$$</span></a></span><span> </span><span class="annot"><span class="annottext">Int -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#nest"><span class="hs-identifier hs-var">nest</span></a></span><span> </span><span class="annot"><span class="annottext">Int
</span><span class="hs-number">3</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">[SDoc] -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#vcat"><span class="hs-identifier hs-var">vcat</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(BCInstr -&gt; SDoc) -&gt; [BCInstr] -&gt; [SDoc]
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
</span><a href="../../base/src/GHC.Base.html#map"><span class="hs-identifier hs-var">map</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">[BCInstr]
</span><a href="#local-6989586621681054987"><span class="hs-identifier hs-var">instrs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span></span><span>
</span><span id="line-196"></span><span>
</span><span id="line-197"></span><span class="hs-comment">-- Print enough of the Core expression to enable the reader to find</span><span>
</span><span id="line-198"></span><span class="hs-comment">-- the expression in the -ddump-prep output.  That is, we need to</span><span>
</span><span id="line-199"></span><span class="hs-comment">-- include at least a binder.</span><span>
</span><span id="line-200"></span><span>
</span><span id="line-201"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#pprCoreExprShort"><span class="hs-identifier hs-type">pprCoreExprShort</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Core.html#CoreExpr"><span class="hs-identifier hs-type">CoreExpr</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="GHC.Utils.Outputable.html#SDoc"><span class="hs-identifier hs-type">SDoc</span></a></span><span>
</span><span id="line-202"></span><span id="pprCoreExprShort"><span class="annot"><span class="annottext">pprCoreExprShort :: CoreExpr -&gt; SDoc
</span><a href="GHC.ByteCode.Instr.html#pprCoreExprShort"><span class="hs-identifier hs-var hs-var">pprCoreExprShort</span></a></span></span><span> </span><span id="local-6989586621681054962"><span class="annot"><span class="annottext">expr :: CoreExpr
</span><a href="#local-6989586621681054962"><span class="hs-identifier hs-var">expr</span></a></span></span><span class="hs-glyph">@</span><span class="hs-special">(</span><span class="annot"><a href="GHC.Core.html#Lam"><span class="hs-identifier hs-type">Lam</span></a></span><span> </span><span class="annot"><span class="annottext">CoreBndr
</span><span class="hs-identifier">_</span></span><span> </span><span class="annot"><span class="annottext">CoreExpr
</span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span>
</span><span id="line-203"></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">let</span><span>
</span><span id="line-204"></span><span>        </span><span class="hs-special">(</span><span id="local-6989586621681054960"><span class="annot"><span class="annottext">[CoreBndr]
</span><a href="#local-6989586621681054960"><span class="hs-identifier hs-var">bndrs</span></a></span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">CoreExpr
</span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">CoreExpr -&gt; ([CoreBndr], CoreExpr)
forall b. Expr b -&gt; ([b], Expr b)
</span><a href="GHC.Core.html#collectBinders"><span class="hs-identifier hs-var">collectBinders</span></a></span><span> </span><span class="annot"><span class="annottext">CoreExpr
</span><a href="#local-6989586621681054962"><span class="hs-identifier hs-var">expr</span></a></span><span>
</span><span id="line-205"></span><span>    </span><span class="hs-keyword">in</span><span>
</span><span id="line-206"></span><span>    </span><span class="annot"><span class="annottext">Char -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#char"><span class="hs-identifier hs-var">char</span></a></span><span> </span><span class="annot"><span class="annottext">Char
</span><span class="hs-char">'\\'</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">[SDoc] -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#sep"><span class="hs-identifier hs-var">sep</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(CoreBndr -&gt; SDoc) -&gt; [CoreBndr] -&gt; [SDoc]
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
</span><a href="../../base/src/GHC.Base.html#map"><span class="hs-identifier hs-var">map</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">BindingSite -&gt; CoreBndr -&gt; SDoc
forall a. OutputableBndr a =&gt; BindingSite -&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#pprBndr"><span class="hs-identifier hs-var">pprBndr</span></a></span><span> </span><span class="annot"><span class="annottext">BindingSite
</span><a href="GHC.Utils.Outputable.html#LambdaBind"><span class="hs-identifier hs-var">LambdaBind</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">[CoreBndr]
</span><a href="#local-6989586621681054960"><span class="hs-identifier hs-var">bndrs</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc
</span><a href="GHC.Utils.Outputable.html#arrow"><span class="hs-identifier hs-var">arrow</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;...&quot;</span></span><span>
</span><span id="line-207"></span><span>
</span><span id="line-208"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#pprCoreExprShort"><span class="hs-identifier hs-var">pprCoreExprShort</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.Core.html#Case"><span class="hs-identifier hs-type">Case</span></a></span><span> </span><span id="local-6989586621681054953"><span class="annot"><span class="annottext">CoreExpr
</span><a href="#local-6989586621681054953"><span class="hs-identifier hs-var">_expr</span></a></span></span><span> </span><span id="local-6989586621681054952"><span class="annot"><span class="annottext">CoreBndr
</span><a href="#local-6989586621681054952"><span class="hs-identifier hs-var">var</span></a></span></span><span> </span><span id="local-6989586621681054951"><span class="annot"><span class="annottext">Type
</span><a href="#local-6989586621681054951"><span class="hs-identifier hs-var">_ty</span></a></span></span><span> </span><span id="local-6989586621681054950"><span class="annot"><span class="annottext">[CoreAlt]
</span><a href="#local-6989586621681054950"><span class="hs-identifier hs-var">_alts</span></a></span></span><span class="hs-special">)</span><span>
</span><span id="line-209"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;case of&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">CoreBndr -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">CoreBndr
</span><a href="#local-6989586621681054952"><span class="hs-identifier hs-var">var</span></a></span><span>
</span><span id="line-210"></span><span>
</span><span id="line-211"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#pprCoreExprShort"><span class="hs-identifier hs-var">pprCoreExprShort</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.Core.html#Let"><span class="hs-identifier hs-type">Let</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.Core.html#NonRec"><span class="hs-identifier hs-type">NonRec</span></a></span><span> </span><span id="local-6989586621681054947"><span class="annot"><span class="annottext">CoreBndr
</span><a href="#local-6989586621681054947"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="annot"><span class="annottext">CoreExpr
</span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">CoreExpr
</span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;let&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">CoreBndr -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">CoreBndr
</span><a href="#local-6989586621681054947"><span class="hs-identifier hs-var">x</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">PtrString -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ptext"><span class="hs-identifier hs-var">ptext</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; PtrString
</span><a href="GHC.Data.FastString.html#sLit"><span class="hs-identifier hs-var">sLit</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;= ... in ...&quot;</span></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-212"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#pprCoreExprShort"><span class="hs-identifier hs-var">pprCoreExprShort</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.Core.html#Let"><span class="hs-identifier hs-type">Let</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.Core.html#Rec"><span class="hs-identifier hs-type">Rec</span></a></span><span> </span><span id="local-6989586621681054943"><span class="annot"><span class="annottext">[(CoreBndr, CoreExpr)]
</span><a href="#local-6989586621681054943"><span class="hs-identifier hs-var">bs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">CoreExpr
</span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;let {&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">CoreBndr -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(CoreBndr, CoreExpr) -&gt; CoreBndr
forall a b. (a, b) -&gt; a
</span><a href="../../base/src/Data.Tuple.html#fst"><span class="hs-identifier hs-var">fst</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">[(CoreBndr, CoreExpr)] -&gt; (CoreBndr, CoreExpr)
forall a. [a] -&gt; a
</span><a href="../../base/src/GHC.List.html#head"><span class="hs-identifier hs-var">head</span></a></span><span> </span><span class="annot"><span class="annottext">[(CoreBndr, CoreExpr)]
</span><a href="#local-6989586621681054943"><span class="hs-identifier hs-var">bs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">PtrString -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ptext"><span class="hs-identifier hs-var">ptext</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; PtrString
</span><a href="GHC.Data.FastString.html#sLit"><span class="hs-identifier hs-var">sLit</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;= ...; ... } in ...&quot;</span></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-213"></span><span>
</span><span id="line-214"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#pprCoreExprShort"><span class="hs-identifier hs-var">pprCoreExprShort</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.Core.html#Tick"><span class="hs-identifier hs-type">Tick</span></a></span><span> </span><span id="local-6989586621681054940"><span class="annot"><span class="annottext">Tickish CoreBndr
</span><a href="#local-6989586621681054940"><span class="hs-identifier hs-var">t</span></a></span></span><span> </span><span id="local-6989586621681054939"><span class="annot"><span class="annottext">CoreExpr
</span><a href="#local-6989586621681054939"><span class="hs-identifier hs-var">e</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Tickish CoreBndr -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Tickish CoreBndr
</span><a href="#local-6989586621681054940"><span class="hs-identifier hs-var">t</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">CoreExpr -&gt; SDoc
</span><a href="GHC.ByteCode.Instr.html#pprCoreExprShort"><span class="hs-identifier hs-var">pprCoreExprShort</span></a></span><span> </span><span class="annot"><span class="annottext">CoreExpr
</span><a href="#local-6989586621681054939"><span class="hs-identifier hs-var">e</span></a></span><span>
</span><span id="line-215"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#pprCoreExprShort"><span class="hs-identifier hs-var">pprCoreExprShort</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.Core.html#Cast"><span class="hs-identifier hs-type">Cast</span></a></span><span> </span><span id="local-6989586621681054937"><span class="annot"><span class="annottext">CoreExpr
</span><a href="#local-6989586621681054937"><span class="hs-identifier hs-var">e</span></a></span></span><span> </span><span class="annot"><span class="annottext">CoercionR
</span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">CoreExpr -&gt; SDoc
</span><a href="GHC.ByteCode.Instr.html#pprCoreExprShort"><span class="hs-identifier hs-var">pprCoreExprShort</span></a></span><span> </span><span class="annot"><span class="annottext">CoreExpr
</span><a href="#local-6989586621681054937"><span class="hs-identifier hs-var">e</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;`cast` T&quot;</span></span><span>
</span><span id="line-216"></span><span>
</span><span id="line-217"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#pprCoreExprShort"><span class="hs-identifier hs-var">pprCoreExprShort</span></a></span><span> </span><span id="local-6989586621681054936"><span class="annot"><span class="annottext">CoreExpr
</span><a href="#local-6989586621681054936"><span class="hs-identifier hs-var">e</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">CoreExpr -&gt; SDoc
forall b. OutputableBndr b =&gt; Expr b -&gt; SDoc
</span><a href="GHC.Core.Ppr.html#pprCoreExpr"><span class="hs-identifier hs-var">pprCoreExpr</span></a></span><span> </span><span class="annot"><span class="annottext">CoreExpr
</span><a href="#local-6989586621681054936"><span class="hs-identifier hs-var">e</span></a></span><span>
</span><span id="line-218"></span><span>
</span><span id="line-219"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#pprCoreAltShort"><span class="hs-identifier hs-type">pprCoreAltShort</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.Core.html#CoreAlt"><span class="hs-identifier hs-type">CoreAlt</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="GHC.Utils.Outputable.html#SDoc"><span class="hs-identifier hs-type">SDoc</span></a></span><span>
</span><span id="line-220"></span><span id="pprCoreAltShort"><span class="annot"><span class="annottext">pprCoreAltShort :: CoreAlt -&gt; SDoc
</span><a href="GHC.ByteCode.Instr.html#pprCoreAltShort"><span class="hs-identifier hs-var hs-var">pprCoreAltShort</span></a></span></span><span> </span><span class="hs-special">(</span><span id="local-6989586621681054934"><span class="annot"><span class="annottext">AltCon
</span><a href="#local-6989586621681054934"><span class="hs-identifier hs-var">con</span></a></span></span><span class="hs-special">,</span><span> </span><span id="local-6989586621681054933"><span class="annot"><span class="annottext">[CoreBndr]
</span><a href="#local-6989586621681054933"><span class="hs-identifier hs-var">args</span></a></span></span><span class="hs-special">,</span><span> </span><span id="local-6989586621681054932"><span class="annot"><span class="annottext">CoreExpr
</span><a href="#local-6989586621681054932"><span class="hs-identifier hs-var">expr</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">AltCon -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">AltCon
</span><a href="#local-6989586621681054934"><span class="hs-identifier hs-var">con</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">[SDoc] -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#sep"><span class="hs-identifier hs-var">sep</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(CoreBndr -&gt; SDoc) -&gt; [CoreBndr] -&gt; [SDoc]
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
</span><a href="../../base/src/GHC.Base.html#map"><span class="hs-identifier hs-var">map</span></a></span><span> </span><span class="annot"><span class="annottext">CoreBndr -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">[CoreBndr]
</span><a href="#local-6989586621681054933"><span class="hs-identifier hs-var">args</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;-&gt;&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">CoreExpr -&gt; SDoc
</span><a href="GHC.ByteCode.Instr.html#pprCoreExprShort"><span class="hs-identifier hs-var">pprCoreExprShort</span></a></span><span> </span><span class="annot"><span class="annottext">CoreExpr
</span><a href="#local-6989586621681054932"><span class="hs-identifier hs-var">expr</span></a></span><span>
</span><span id="line-221"></span><span>
</span><span id="line-222"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621681054929"><span class="annot"><a href="GHC.Utils.Outputable.html#Outputable"><span class="hs-identifier hs-type">Outputable</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#BCInstr"><span class="hs-identifier hs-type">BCInstr</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-223"></span><span>   </span><span id="local-6989586621681054849"><span class="annot"><span class="annottext">ppr :: BCInstr -&gt; SDoc
</span><a href="#local-6989586621681054849"><span class="hs-identifier hs-var hs-var hs-var hs-var">ppr</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#STKCHECK"><span class="hs-identifier hs-type">STKCHECK</span></a></span><span> </span><span id="local-6989586621681054848"><span class="annot"><span class="annottext">Word
</span><a href="#local-6989586621681054848"><span class="hs-identifier hs-var">n</span></a></span></span><span class="hs-special">)</span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;STKCHECK&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word
</span><a href="#local-6989586621681054848"><span class="hs-identifier hs-var">n</span></a></span><span>
</span><span id="line-224"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_L"><span class="hs-identifier hs-type">PUSH_L</span></a></span><span> </span><span id="local-6989586621681054847"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054847"><span class="hs-identifier hs-var">offset</span></a></span></span><span class="hs-special">)</span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_L  &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054847"><span class="hs-identifier hs-var">offset</span></a></span><span>
</span><span id="line-225"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_LL"><span class="hs-identifier hs-type">PUSH_LL</span></a></span><span> </span><span id="local-6989586621681054846"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054846"><span class="hs-identifier hs-var">o1</span></a></span></span><span> </span><span id="local-6989586621681054845"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054845"><span class="hs-identifier hs-var">o2</span></a></span></span><span class="hs-special">)</span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_LL &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054846"><span class="hs-identifier hs-var">o1</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054845"><span class="hs-identifier hs-var">o2</span></a></span><span>
</span><span id="line-226"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_LLL"><span class="hs-identifier hs-type">PUSH_LLL</span></a></span><span> </span><span id="local-6989586621681054844"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054844"><span class="hs-identifier hs-var">o1</span></a></span></span><span> </span><span id="local-6989586621681054843"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054843"><span class="hs-identifier hs-var">o2</span></a></span></span><span> </span><span id="local-6989586621681054842"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054842"><span class="hs-identifier hs-var">o3</span></a></span></span><span class="hs-special">)</span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_LLL&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054844"><span class="hs-identifier hs-var">o1</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054843"><span class="hs-identifier hs-var">o2</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054842"><span class="hs-identifier hs-var">o3</span></a></span><span>
</span><span id="line-227"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH8"><span class="hs-identifier hs-type">PUSH8</span></a></span><span>  </span><span id="local-6989586621681054841"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054841"><span class="hs-identifier hs-var">offset</span></a></span></span><span class="hs-special">)</span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH8  &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054841"><span class="hs-identifier hs-var">offset</span></a></span><span>
</span><span id="line-228"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH16"><span class="hs-identifier hs-type">PUSH16</span></a></span><span> </span><span id="local-6989586621681054840"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054840"><span class="hs-identifier hs-var">offset</span></a></span></span><span class="hs-special">)</span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH16  &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054840"><span class="hs-identifier hs-var">offset</span></a></span><span>
</span><span id="line-229"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH32"><span class="hs-identifier hs-type">PUSH32</span></a></span><span> </span><span id="local-6989586621681054839"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054839"><span class="hs-identifier hs-var">offset</span></a></span></span><span class="hs-special">)</span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH32  &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054839"><span class="hs-identifier hs-var">offset</span></a></span><span>
</span><span id="line-230"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH8_W"><span class="hs-identifier hs-type">PUSH8_W</span></a></span><span>  </span><span id="local-6989586621681054838"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054838"><span class="hs-identifier hs-var">offset</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH8_W  &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054838"><span class="hs-identifier hs-var">offset</span></a></span><span>
</span><span id="line-231"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH16_W"><span class="hs-identifier hs-type">PUSH16_W</span></a></span><span> </span><span id="local-6989586621681054837"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054837"><span class="hs-identifier hs-var">offset</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH16_W  &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054837"><span class="hs-identifier hs-var">offset</span></a></span><span>
</span><span id="line-232"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH32_W"><span class="hs-identifier hs-type">PUSH32_W</span></a></span><span> </span><span id="local-6989586621681054836"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054836"><span class="hs-identifier hs-var">offset</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH32_W  &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054836"><span class="hs-identifier hs-var">offset</span></a></span><span>
</span><span id="line-233"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_G"><span class="hs-identifier hs-type">PUSH_G</span></a></span><span> </span><span id="local-6989586621681054835"><span class="annot"><span class="annottext">Name
</span><a href="#local-6989586621681054835"><span class="hs-identifier hs-var">nm</span></a></span></span><span class="hs-special">)</span><span>           </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_G  &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Name -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Name
</span><a href="#local-6989586621681054835"><span class="hs-identifier hs-var">nm</span></a></span><span>
</span><span id="line-234"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_PRIMOP"><span class="hs-identifier hs-type">PUSH_PRIMOP</span></a></span><span> </span><span id="local-6989586621681054834"><span class="annot"><span class="annottext">PrimOp
</span><a href="#local-6989586621681054834"><span class="hs-identifier hs-var">op</span></a></span></span><span class="hs-special">)</span><span>      </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_G  &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;GHC.PrimopWrappers.&quot;</span></span><span>
</span><span id="line-235"></span><span>                                               </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">PrimOp -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">PrimOp
</span><a href="#local-6989586621681054834"><span class="hs-identifier hs-var">op</span></a></span><span>
</span><span id="line-236"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_BCO"><span class="hs-identifier hs-type">PUSH_BCO</span></a></span><span> </span><span id="local-6989586621681054833"><span class="annot"><span class="annottext">ProtoBCO Name
</span><a href="#local-6989586621681054833"><span class="hs-identifier hs-var">bco</span></a></span></span><span class="hs-special">)</span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; Int -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#hang"><span class="hs-identifier hs-var">hang</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_BCO&quot;</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Int
</span><span class="hs-number">2</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ProtoBCO Name -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">ProtoBCO Name
</span><a href="#local-6989586621681054833"><span class="hs-identifier hs-var">bco</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-237"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_ALTS"><span class="hs-identifier hs-type">PUSH_ALTS</span></a></span><span> </span><span id="local-6989586621681054831"><span class="annot"><span class="annottext">ProtoBCO Name
</span><a href="#local-6989586621681054831"><span class="hs-identifier hs-var">bco</span></a></span></span><span class="hs-special">)</span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; Int -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#hang"><span class="hs-identifier hs-var">hang</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_ALTS&quot;</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Int
</span><span class="hs-number">2</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ProtoBCO Name -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">ProtoBCO Name
</span><a href="#local-6989586621681054831"><span class="hs-identifier hs-var">bco</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-238"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_ALTS_UNLIFTED"><span class="hs-identifier hs-type">PUSH_ALTS_UNLIFTED</span></a></span><span> </span><span id="local-6989586621681054830"><span class="annot"><span class="annottext">ProtoBCO Name
</span><a href="#local-6989586621681054830"><span class="hs-identifier hs-var">bco</span></a></span></span><span> </span><span id="local-6989586621681054829"><span class="annot"><span class="annottext">ArgRep
</span><a href="#local-6989586621681054829"><span class="hs-identifier hs-var">pk</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; Int -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#hang"><span class="hs-identifier hs-var">hang</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_ALTS_UNLIFTED&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">ArgRep -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">ArgRep
</span><a href="#local-6989586621681054829"><span class="hs-identifier hs-var">pk</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Int
</span><span class="hs-number">2</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ProtoBCO Name -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">ProtoBCO Name
</span><a href="#local-6989586621681054830"><span class="hs-identifier hs-var">bco</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-239"></span><span>
</span><span id="line-240"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_PAD8"><span class="hs-identifier hs-var">PUSH_PAD8</span></a></span><span>             </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_PAD8&quot;</span></span><span>
</span><span id="line-241"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_PAD16"><span class="hs-identifier hs-var">PUSH_PAD16</span></a></span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_PAD16&quot;</span></span><span>
</span><span id="line-242"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_PAD32"><span class="hs-identifier hs-var">PUSH_PAD32</span></a></span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_PAD32&quot;</span></span><span>
</span><span id="line-243"></span><span>
</span><span id="line-244"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_UBX8"><span class="hs-identifier hs-type">PUSH_UBX8</span></a></span><span>  </span><span id="local-6989586621681054828"><span class="annot"><span class="annottext">Literal
</span><a href="#local-6989586621681054828"><span class="hs-identifier hs-var">lit</span></a></span></span><span class="hs-special">)</span><span>      </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_UBX8&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Literal -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Literal
</span><a href="#local-6989586621681054828"><span class="hs-identifier hs-var">lit</span></a></span><span>
</span><span id="line-245"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_UBX16"><span class="hs-identifier hs-type">PUSH_UBX16</span></a></span><span> </span><span id="local-6989586621681054827"><span class="annot"><span class="annottext">Literal
</span><a href="#local-6989586621681054827"><span class="hs-identifier hs-var">lit</span></a></span></span><span class="hs-special">)</span><span>      </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_UBX16&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Literal -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Literal
</span><a href="#local-6989586621681054827"><span class="hs-identifier hs-var">lit</span></a></span><span>
</span><span id="line-246"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_UBX32"><span class="hs-identifier hs-type">PUSH_UBX32</span></a></span><span> </span><span id="local-6989586621681054826"><span class="annot"><span class="annottext">Literal
</span><a href="#local-6989586621681054826"><span class="hs-identifier hs-var">lit</span></a></span></span><span class="hs-special">)</span><span>      </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_UBX32&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Literal -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Literal
</span><a href="#local-6989586621681054826"><span class="hs-identifier hs-var">lit</span></a></span><span>
</span><span id="line-247"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_UBX"><span class="hs-identifier hs-type">PUSH_UBX</span></a></span><span> </span><span id="local-6989586621681054825"><span class="annot"><span class="annottext">Literal
</span><a href="#local-6989586621681054825"><span class="hs-identifier hs-var">lit</span></a></span></span><span> </span><span id="local-6989586621681054824"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054824"><span class="hs-identifier hs-var">nw</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_UBX&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#parens"><span class="hs-identifier hs-var">parens</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054824"><span class="hs-identifier hs-var">nw</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Literal -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Literal
</span><a href="#local-6989586621681054825"><span class="hs-identifier hs-var">lit</span></a></span><span>
</span><span id="line-248"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_N"><span class="hs-identifier hs-var">PUSH_APPLY_N</span></a></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_APPLY_N&quot;</span></span><span>
</span><span id="line-249"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_V"><span class="hs-identifier hs-var">PUSH_APPLY_V</span></a></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_APPLY_V&quot;</span></span><span>
</span><span id="line-250"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_F"><span class="hs-identifier hs-var">PUSH_APPLY_F</span></a></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_APPLY_F&quot;</span></span><span>
</span><span id="line-251"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_D"><span class="hs-identifier hs-var">PUSH_APPLY_D</span></a></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_APPLY_D&quot;</span></span><span>
</span><span id="line-252"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_L"><span class="hs-identifier hs-var">PUSH_APPLY_L</span></a></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_APPLY_L&quot;</span></span><span>
</span><span id="line-253"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_P"><span class="hs-identifier hs-var">PUSH_APPLY_P</span></a></span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_APPLY_P&quot;</span></span><span>
</span><span id="line-254"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PP"><span class="hs-identifier hs-var">PUSH_APPLY_PP</span></a></span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_APPLY_PP&quot;</span></span><span>
</span><span id="line-255"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PPP"><span class="hs-identifier hs-var">PUSH_APPLY_PPP</span></a></span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_APPLY_PPP&quot;</span></span><span>
</span><span id="line-256"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PPPP"><span class="hs-identifier hs-var">PUSH_APPLY_PPPP</span></a></span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_APPLY_PPPP&quot;</span></span><span>
</span><span id="line-257"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PPPPP"><span class="hs-identifier hs-var">PUSH_APPLY_PPPPP</span></a></span><span>      </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_APPLY_PPPPP&quot;</span></span><span>
</span><span id="line-258"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PPPPPP"><span class="hs-identifier hs-var">PUSH_APPLY_PPPPPP</span></a></span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PUSH_APPLY_PPPPPP&quot;</span></span><span>
</span><span id="line-259"></span><span>
</span><span id="line-260"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#SLIDE"><span class="hs-identifier hs-type">SLIDE</span></a></span><span> </span><span id="local-6989586621681054822"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054822"><span class="hs-identifier hs-var">n</span></a></span></span><span> </span><span id="local-6989586621681054821"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054821"><span class="hs-identifier hs-var">d</span></a></span></span><span class="hs-special">)</span><span>           </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;SLIDE   &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054822"><span class="hs-identifier hs-var">n</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054821"><span class="hs-identifier hs-var">d</span></a></span><span>
</span><span id="line-261"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#ALLOC_AP"><span class="hs-identifier hs-type">ALLOC_AP</span></a></span><span> </span><span id="local-6989586621681054820"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054820"><span class="hs-identifier hs-var">sz</span></a></span></span><span class="hs-special">)</span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;ALLOC_AP   &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054820"><span class="hs-identifier hs-var">sz</span></a></span><span>
</span><span id="line-262"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#ALLOC_AP_NOUPD"><span class="hs-identifier hs-type">ALLOC_AP_NOUPD</span></a></span><span> </span><span id="local-6989586621681054819"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054819"><span class="hs-identifier hs-var">sz</span></a></span></span><span class="hs-special">)</span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;ALLOC_AP_NOUPD   &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054819"><span class="hs-identifier hs-var">sz</span></a></span><span>
</span><span id="line-263"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#ALLOC_PAP"><span class="hs-identifier hs-type">ALLOC_PAP</span></a></span><span> </span><span id="local-6989586621681054818"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054818"><span class="hs-identifier hs-var">arity</span></a></span></span><span> </span><span id="local-6989586621681054817"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054817"><span class="hs-identifier hs-var">sz</span></a></span></span><span class="hs-special">)</span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;ALLOC_PAP   &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054818"><span class="hs-identifier hs-var">arity</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054817"><span class="hs-identifier hs-var">sz</span></a></span><span>
</span><span id="line-264"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#MKAP"><span class="hs-identifier hs-type">MKAP</span></a></span><span> </span><span id="local-6989586621681054816"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054816"><span class="hs-identifier hs-var">offset</span></a></span></span><span> </span><span id="local-6989586621681054815"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054815"><span class="hs-identifier hs-var">sz</span></a></span></span><span class="hs-special">)</span><span>      </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;MKAP    &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054815"><span class="hs-identifier hs-var">sz</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;words,&quot;</span></span><span>
</span><span id="line-265"></span><span>                                               </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054816"><span class="hs-identifier hs-var">offset</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;stkoff&quot;</span></span><span>
</span><span id="line-266"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#MKPAP"><span class="hs-identifier hs-type">MKPAP</span></a></span><span> </span><span id="local-6989586621681054814"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054814"><span class="hs-identifier hs-var">offset</span></a></span></span><span> </span><span id="local-6989586621681054813"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054813"><span class="hs-identifier hs-var">sz</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;MKPAP   &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054813"><span class="hs-identifier hs-var">sz</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;words,&quot;</span></span><span>
</span><span id="line-267"></span><span>                                               </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054814"><span class="hs-identifier hs-var">offset</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;stkoff&quot;</span></span><span>
</span><span id="line-268"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#UNPACK"><span class="hs-identifier hs-type">UNPACK</span></a></span><span> </span><span id="local-6989586621681054812"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054812"><span class="hs-identifier hs-var">sz</span></a></span></span><span class="hs-special">)</span><span>           </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;UNPACK  &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054812"><span class="hs-identifier hs-var">sz</span></a></span><span>
</span><span id="line-269"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PACK"><span class="hs-identifier hs-type">PACK</span></a></span><span> </span><span id="local-6989586621681054811"><span class="annot"><span class="annottext">DataCon
</span><a href="#local-6989586621681054811"><span class="hs-identifier hs-var">dcon</span></a></span></span><span> </span><span id="local-6989586621681054810"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054810"><span class="hs-identifier hs-var">sz</span></a></span></span><span class="hs-special">)</span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;PACK    &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">DataCon -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">DataCon
</span><a href="#local-6989586621681054811"><span class="hs-identifier hs-var">dcon</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054810"><span class="hs-identifier hs-var">sz</span></a></span><span>
</span><span id="line-270"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#LABEL"><span class="hs-identifier hs-type">LABEL</span></a></span><span>     </span><span id="local-6989586621681054809"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054809"><span class="hs-identifier hs-var">lab</span></a></span></span><span class="hs-special">)</span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;__&quot;</span></span><span>       </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054809"><span class="hs-identifier hs-var">lab</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc
</span><a href="GHC.Utils.Outputable.html#colon"><span class="hs-identifier hs-var">colon</span></a></span><span>
</span><span id="line-271"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_I"><span class="hs-identifier hs-type">TESTLT_I</span></a></span><span>  </span><span id="local-6989586621681054808"><span class="annot"><span class="annottext">Int
</span><a href="#local-6989586621681054808"><span class="hs-identifier hs-var">i</span></a></span></span><span> </span><span id="local-6989586621681054807"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054807"><span class="hs-identifier hs-var">lab</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;TESTLT_I&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Int -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#int"><span class="hs-identifier hs-var">int</span></a></span><span> </span><span class="annot"><span class="annottext">Int
</span><a href="#local-6989586621681054808"><span class="hs-identifier hs-var">i</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;__&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054807"><span class="hs-identifier hs-var">lab</span></a></span><span>
</span><span id="line-272"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_I"><span class="hs-identifier hs-type">TESTEQ_I</span></a></span><span>  </span><span id="local-6989586621681054806"><span class="annot"><span class="annottext">Int
</span><a href="#local-6989586621681054806"><span class="hs-identifier hs-var">i</span></a></span></span><span> </span><span id="local-6989586621681054805"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054805"><span class="hs-identifier hs-var">lab</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;TESTEQ_I&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Int -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#int"><span class="hs-identifier hs-var">int</span></a></span><span> </span><span class="annot"><span class="annottext">Int
</span><a href="#local-6989586621681054806"><span class="hs-identifier hs-var">i</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;__&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054805"><span class="hs-identifier hs-var">lab</span></a></span><span>
</span><span id="line-273"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_W"><span class="hs-identifier hs-type">TESTLT_W</span></a></span><span>  </span><span id="local-6989586621681054804"><span class="annot"><span class="annottext">Word
</span><a href="#local-6989586621681054804"><span class="hs-identifier hs-var">i</span></a></span></span><span> </span><span id="local-6989586621681054803"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054803"><span class="hs-identifier hs-var">lab</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;TESTLT_W&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Int -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#int"><span class="hs-identifier hs-var">int</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word -&gt; Int
forall a b. (Integral a, Num b) =&gt; a -&gt; b
</span><a href="../../base/src/GHC.Real.html#fromIntegral"><span class="hs-identifier hs-var">fromIntegral</span></a></span><span> </span><span class="annot"><span class="annottext">Word
</span><a href="#local-6989586621681054804"><span class="hs-identifier hs-var">i</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;__&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054803"><span class="hs-identifier hs-var">lab</span></a></span><span>
</span><span id="line-274"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_W"><span class="hs-identifier hs-type">TESTEQ_W</span></a></span><span>  </span><span id="local-6989586621681054802"><span class="annot"><span class="annottext">Word
</span><a href="#local-6989586621681054802"><span class="hs-identifier hs-var">i</span></a></span></span><span> </span><span id="local-6989586621681054801"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054801"><span class="hs-identifier hs-var">lab</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;TESTEQ_W&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Int -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#int"><span class="hs-identifier hs-var">int</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word -&gt; Int
forall a b. (Integral a, Num b) =&gt; a -&gt; b
</span><a href="../../base/src/GHC.Real.html#fromIntegral"><span class="hs-identifier hs-var">fromIntegral</span></a></span><span> </span><span class="annot"><span class="annottext">Word
</span><a href="#local-6989586621681054802"><span class="hs-identifier hs-var">i</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;__&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054801"><span class="hs-identifier hs-var">lab</span></a></span><span>
</span><span id="line-275"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_F"><span class="hs-identifier hs-type">TESTLT_F</span></a></span><span>  </span><span id="local-6989586621681054800"><span class="annot"><span class="annottext">Float
</span><a href="#local-6989586621681054800"><span class="hs-identifier hs-var">f</span></a></span></span><span> </span><span id="local-6989586621681054799"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054799"><span class="hs-identifier hs-var">lab</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;TESTLT_F&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Float -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#float"><span class="hs-identifier hs-var">float</span></a></span><span> </span><span class="annot"><span class="annottext">Float
</span><a href="#local-6989586621681054800"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;__&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054799"><span class="hs-identifier hs-var">lab</span></a></span><span>
</span><span id="line-276"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_F"><span class="hs-identifier hs-type">TESTEQ_F</span></a></span><span>  </span><span id="local-6989586621681054797"><span class="annot"><span class="annottext">Float
</span><a href="#local-6989586621681054797"><span class="hs-identifier hs-var">f</span></a></span></span><span> </span><span id="local-6989586621681054796"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054796"><span class="hs-identifier hs-var">lab</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;TESTEQ_F&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Float -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#float"><span class="hs-identifier hs-var">float</span></a></span><span> </span><span class="annot"><span class="annottext">Float
</span><a href="#local-6989586621681054797"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;__&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054796"><span class="hs-identifier hs-var">lab</span></a></span><span>
</span><span id="line-277"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_D"><span class="hs-identifier hs-type">TESTLT_D</span></a></span><span>  </span><span id="local-6989586621681054795"><span class="annot"><span class="annottext">Double
</span><a href="#local-6989586621681054795"><span class="hs-identifier hs-var">d</span></a></span></span><span> </span><span id="local-6989586621681054794"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054794"><span class="hs-identifier hs-var">lab</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;TESTLT_D&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Double -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#double"><span class="hs-identifier hs-var">double</span></a></span><span> </span><span class="annot"><span class="annottext">Double
</span><a href="#local-6989586621681054795"><span class="hs-identifier hs-var">d</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;__&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054794"><span class="hs-identifier hs-var">lab</span></a></span><span>
</span><span id="line-278"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_D"><span class="hs-identifier hs-type">TESTEQ_D</span></a></span><span>  </span><span id="local-6989586621681054792"><span class="annot"><span class="annottext">Double
</span><a href="#local-6989586621681054792"><span class="hs-identifier hs-var">d</span></a></span></span><span> </span><span id="local-6989586621681054791"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054791"><span class="hs-identifier hs-var">lab</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;TESTEQ_D&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Double -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#double"><span class="hs-identifier hs-var">double</span></a></span><span> </span><span class="annot"><span class="annottext">Double
</span><a href="#local-6989586621681054792"><span class="hs-identifier hs-var">d</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;__&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054791"><span class="hs-identifier hs-var">lab</span></a></span><span>
</span><span id="line-279"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_P"><span class="hs-identifier hs-type">TESTLT_P</span></a></span><span>  </span><span id="local-6989586621681054790"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054790"><span class="hs-identifier hs-var">i</span></a></span></span><span> </span><span id="local-6989586621681054789"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054789"><span class="hs-identifier hs-var">lab</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;TESTLT_P&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054790"><span class="hs-identifier hs-var">i</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;__&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054789"><span class="hs-identifier hs-var">lab</span></a></span><span>
</span><span id="line-280"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_P"><span class="hs-identifier hs-type">TESTEQ_P</span></a></span><span>  </span><span id="local-6989586621681054788"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054788"><span class="hs-identifier hs-var">i</span></a></span></span><span> </span><span id="local-6989586621681054787"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054787"><span class="hs-identifier hs-var">lab</span></a></span></span><span class="hs-special">)</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;TESTEQ_P&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054788"><span class="hs-identifier hs-var">i</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;__&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%3E"><span class="hs-operator hs-var">&lt;&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054787"><span class="hs-identifier hs-var">lab</span></a></span><span>
</span><span id="line-281"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#CASEFAIL"><span class="hs-identifier hs-var">CASEFAIL</span></a></span><span>              </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;CASEFAIL&quot;</span></span><span>
</span><span id="line-282"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#JMP"><span class="hs-identifier hs-type">JMP</span></a></span><span> </span><span id="local-6989586621681054786"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054786"><span class="hs-identifier hs-var">lab</span></a></span></span><span class="hs-special">)</span><span>             </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;JMP&quot;</span></span><span>      </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054786"><span class="hs-identifier hs-var">lab</span></a></span><span>
</span><span id="line-283"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#CCALL"><span class="hs-identifier hs-type">CCALL</span></a></span><span> </span><span id="local-6989586621681054785"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054785"><span class="hs-identifier hs-var">off</span></a></span></span><span> </span><span id="local-6989586621681054784"><span class="annot"><span class="annottext">RemotePtr C_ffi_cif
</span><a href="#local-6989586621681054784"><span class="hs-identifier hs-var">marshall_addr</span></a></span></span><span> </span><span id="local-6989586621681054783"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054783"><span class="hs-identifier hs-var">flags</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;CCALL   &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054785"><span class="hs-identifier hs-var">off</span></a></span><span>
</span><span id="line-284"></span><span>                                                </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;marshall code at&quot;</span></span><span>
</span><span id="line-285"></span><span>                                               </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">RemotePtr C_ffi_cif -&gt; String
forall a. Show a =&gt; a -&gt; String
</span><a href="../../base/src/GHC.Show.html#show"><span class="hs-identifier hs-var">show</span></a></span><span> </span><span class="annot"><span class="annottext">RemotePtr C_ffi_cif
</span><a href="#local-6989586621681054784"><span class="hs-identifier hs-var">marshall_addr</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-286"></span><span>                                               </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054783"><span class="hs-identifier hs-var">flags</span></a></span><span> </span><span class="hs-keyword">of</span><span>
</span><span id="line-287"></span><span>                                                      </span><span class="annot"><span class="annottext">Word16
</span><span class="hs-number">0x1</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;(interruptible)&quot;</span></span><span>
</span><span id="line-288"></span><span>                                                      </span><span class="annot"><span class="annottext">Word16
</span><span class="hs-number">0x2</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;(unsafe)&quot;</span></span><span>
</span><span id="line-289"></span><span>                                                      </span><span class="annot"><span class="annottext">Word16
</span><span class="hs-identifier">_</span></span><span>   </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">SDoc
</span><a href="GHC.Utils.Outputable.html#empty"><span class="hs-identifier hs-var">empty</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-290"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#SWIZZLE"><span class="hs-identifier hs-type">SWIZZLE</span></a></span><span> </span><span id="local-6989586621681054781"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054781"><span class="hs-identifier hs-var">stkoff</span></a></span></span><span> </span><span id="local-6989586621681054780"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054780"><span class="hs-identifier hs-var">n</span></a></span></span><span class="hs-special">)</span><span>    </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;SWIZZLE &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;stkoff&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054781"><span class="hs-identifier hs-var">stkoff</span></a></span><span>
</span><span id="line-291"></span><span>                                               </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;by&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054780"><span class="hs-identifier hs-var">n</span></a></span><span>
</span><span id="line-292"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#ENTER"><span class="hs-identifier hs-var">ENTER</span></a></span><span>                 </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;ENTER&quot;</span></span><span>
</span><span id="line-293"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#RETURN"><span class="hs-identifier hs-var">RETURN</span></a></span><span>                </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;RETURN&quot;</span></span><span>
</span><span id="line-294"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#RETURN_UBX"><span class="hs-identifier hs-type">RETURN_UBX</span></a></span><span> </span><span id="local-6989586621681054779"><span class="annot"><span class="annottext">ArgRep
</span><a href="#local-6989586621681054779"><span class="hs-identifier hs-var">pk</span></a></span></span><span class="hs-special">)</span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;RETURN_UBX  &quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">ArgRep -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">ArgRep
</span><a href="#local-6989586621681054779"><span class="hs-identifier hs-var">pk</span></a></span><span>
</span><span id="line-295"></span><span>   </span><span class="annot"><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#BRK_FUN"><span class="hs-identifier hs-type">BRK_FUN</span></a></span><span> </span><span id="local-6989586621681054778"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054778"><span class="hs-identifier hs-var">index</span></a></span></span><span> </span><span id="local-6989586621681054777"><span class="annot"><span class="annottext">Unique
</span><a href="#local-6989586621681054777"><span class="hs-identifier hs-var">uniq</span></a></span></span><span> </span><span id="local-6989586621681054776"><span class="annot"><span class="annottext">RemotePtr CostCentre
</span><a href="#local-6989586621681054776"><span class="hs-identifier hs-var">_cc</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;BRK_FUN&quot;</span></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054778"><span class="hs-identifier hs-var">index</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">Unique -&gt; SDoc
forall a. Outputable a =&gt; a -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#ppr"><span class="hs-identifier hs-var">ppr</span></a></span><span> </span><span class="annot"><span class="annottext">Unique
</span><a href="#local-6989586621681054777"><span class="hs-identifier hs-var">uniq</span></a></span><span> </span><span class="annot"><span class="annottext">SDoc -&gt; SDoc -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#%3C%2B%3E"><span class="hs-operator hs-var">&lt;+&gt;</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; SDoc
</span><a href="GHC.Utils.Outputable.html#text"><span class="hs-identifier hs-var">text</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;&lt;cc&gt;&quot;</span></span><span>
</span><span id="line-296"></span><span>
</span><span id="line-297"></span><span class="hs-comment">-- -----------------------------------------------------------------------------</span><span>
</span><span id="line-298"></span><span class="hs-comment">-- The stack use, in words, of each bytecode insn.  These _must_ be</span><span>
</span><span id="line-299"></span><span class="hs-comment">-- correct, or overestimates of reality, to be safe.</span><span>
</span><span id="line-300"></span><span>
</span><span id="line-301"></span><span class="hs-comment">-- NOTE: we aggregate the stack use from case alternatives too, so that</span><span>
</span><span id="line-302"></span><span class="hs-comment">-- we can do a single stack check at the beginning of a function only.</span><span>
</span><span id="line-303"></span><span>
</span><span id="line-304"></span><span class="hs-comment">-- This could all be made more accurate by keeping track of a proper</span><span>
</span><span id="line-305"></span><span class="hs-comment">-- stack high water mark, but it doesn't seem worth the hassle.</span><span>
</span><span id="line-306"></span><span>
</span><span id="line-307"></span><span id="local-6989586621681055109"><span class="annot"><a href="GHC.ByteCode.Instr.html#protoBCOStackUse"><span class="hs-identifier hs-type">protoBCOStackUse</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#ProtoBCO"><span class="hs-identifier hs-type">ProtoBCO</span></a></span><span> </span><span class="annot"><a href="#local-6989586621681055109"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Word</span></span></span><span>
</span><span id="line-308"></span><span id="protoBCOStackUse"><span class="annot"><span class="annottext">protoBCOStackUse :: forall a. ProtoBCO a -&gt; Word
</span><a href="GHC.ByteCode.Instr.html#protoBCOStackUse"><span class="hs-identifier hs-var hs-var">protoBCOStackUse</span></a></span></span><span> </span><span id="local-6989586621681054771"><span class="annot"><span class="annottext">ProtoBCO a
</span><a href="#local-6989586621681054771"><span class="hs-identifier hs-var">bco</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">[Word] -&gt; Word
forall (t :: * -&gt; *) a. (Foldable t, Num a) =&gt; t a -&gt; a
</span><a href="../../base/src/Data.Foldable.html#sum"><span class="hs-identifier hs-var">sum</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(BCInstr -&gt; Word) -&gt; [BCInstr] -&gt; [Word]
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
</span><a href="../../base/src/GHC.Base.html#map"><span class="hs-identifier hs-var">map</span></a></span><span> </span><span class="annot"><span class="annottext">BCInstr -&gt; Word
</span><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ProtoBCO a -&gt; [BCInstr]
forall a. ProtoBCO a -&gt; [BCInstr]
</span><a href="GHC.ByteCode.Instr.html#protoBCOInstrs"><span class="hs-identifier hs-var hs-var">protoBCOInstrs</span></a></span><span> </span><span class="annot"><span class="annottext">ProtoBCO a
</span><a href="#local-6989586621681054771"><span class="hs-identifier hs-var">bco</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-309"></span><span>
</span><span id="line-310"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-type">bciStackUse</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#BCInstr"><span class="hs-identifier hs-type">BCInstr</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Word</span></span><span>
</span><span id="line-311"></span><span id="bciStackUse"><span class="annot"><span class="annottext">bciStackUse :: BCInstr -&gt; Word
</span><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var hs-var">bciStackUse</span></a></span></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#STKCHECK"><span class="hs-identifier hs-type">STKCHECK</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-312"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_L"><span class="hs-identifier hs-type">PUSH_L</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>              </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-313"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_LL"><span class="hs-identifier hs-type">PUSH_LL</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>             </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">2</span></span><span>
</span><span id="line-314"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_LLL"><span class="hs-identifier hs-type">PUSH_LLL</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">3</span></span><span>
</span><span id="line-315"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH8"><span class="hs-identifier hs-type">PUSH8</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>               </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- overapproximation</span><span>
</span><span id="line-316"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH16"><span class="hs-identifier hs-type">PUSH16</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>              </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- overapproximation</span><span>
</span><span id="line-317"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH32"><span class="hs-identifier hs-type">PUSH32</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>              </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- overapproximation on 64bit arch</span><span>
</span><span id="line-318"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH8_W"><span class="hs-identifier hs-type">PUSH8_W</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>             </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- takes exactly 1 word</span><span>
</span><span id="line-319"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH16_W"><span class="hs-identifier hs-type">PUSH16_W</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- takes exactly 1 word</span><span>
</span><span id="line-320"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH32_W"><span class="hs-identifier hs-type">PUSH32_W</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- takes exactly 1 word</span><span>
</span><span id="line-321"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_G"><span class="hs-identifier hs-type">PUSH_G</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>              </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-322"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_PRIMOP"><span class="hs-identifier hs-type">PUSH_PRIMOP</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-323"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_BCO"><span class="hs-identifier hs-type">PUSH_BCO</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-324"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_ALTS"><span class="hs-identifier hs-type">PUSH_ALTS</span></a></span><span> </span><span id="local-6989586621681054769"><span class="annot"><span class="annottext">ProtoBCO Name
</span><a href="#local-6989586621681054769"><span class="hs-identifier hs-var">bco</span></a></span></span><span class="hs-special">)</span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">2</span></span><span> </span><span class="annot"><span class="annottext">Word -&gt; Word -&gt; Word
forall a. Num a =&gt; a -&gt; a -&gt; a
</span><a href="../../base/src/GHC.Num.html#%2B"><span class="hs-operator hs-var">+</span></a></span><span> </span><span class="annot"><span class="annottext">ProtoBCO Name -&gt; Word
forall a. ProtoBCO a -&gt; Word
</span><a href="GHC.ByteCode.Instr.html#protoBCOStackUse"><span class="hs-identifier hs-var">protoBCOStackUse</span></a></span><span> </span><span class="annot"><span class="annottext">ProtoBCO Name
</span><a href="#local-6989586621681054769"><span class="hs-identifier hs-var">bco</span></a></span><span>
</span><span id="line-325"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_ALTS_UNLIFTED"><span class="hs-identifier hs-type">PUSH_ALTS_UNLIFTED</span></a></span><span> </span><span id="local-6989586621681054767"><span class="annot"><span class="annottext">ProtoBCO Name
</span><a href="#local-6989586621681054767"><span class="hs-identifier hs-var">bco</span></a></span></span><span> </span><span class="annot"><span class="annottext">ArgRep
</span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">2</span></span><span> </span><span class="annot"><span class="annottext">Word -&gt; Word -&gt; Word
forall a. Num a =&gt; a -&gt; a -&gt; a
</span><a href="../../base/src/GHC.Num.html#%2B"><span class="hs-operator hs-var">+</span></a></span><span> </span><span class="annot"><span class="annottext">ProtoBCO Name -&gt; Word
forall a. ProtoBCO a -&gt; Word
</span><a href="GHC.ByteCode.Instr.html#protoBCOStackUse"><span class="hs-identifier hs-var">protoBCOStackUse</span></a></span><span> </span><span class="annot"><span class="annottext">ProtoBCO Name
</span><a href="#local-6989586621681054767"><span class="hs-identifier hs-var">bco</span></a></span><span>
</span><span id="line-326"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_PAD8"><span class="hs-identifier hs-var">PUSH_PAD8</span></a></span><span class="hs-special">)</span><span>           </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- overapproximation</span><span>
</span><span id="line-327"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_PAD16"><span class="hs-identifier hs-var">PUSH_PAD16</span></a></span><span class="hs-special">)</span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- overapproximation</span><span>
</span><span id="line-328"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">BCInstr
</span><a href="GHC.ByteCode.Instr.html#PUSH_PAD32"><span class="hs-identifier hs-var">PUSH_PAD32</span></a></span><span class="hs-special">)</span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- overapproximation on 64bit arch</span><span>
</span><span id="line-329"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_UBX8"><span class="hs-identifier hs-type">PUSH_UBX8</span></a></span><span> </span><span class="annot"><span class="annottext">Literal
</span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span>         </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- overapproximation</span><span>
</span><span id="line-330"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_UBX16"><span class="hs-identifier hs-type">PUSH_UBX16</span></a></span><span> </span><span class="annot"><span class="annottext">Literal
</span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- overapproximation</span><span>
</span><span id="line-331"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_UBX32"><span class="hs-identifier hs-type">PUSH_UBX32</span></a></span><span> </span><span class="annot"><span class="annottext">Literal
</span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>  </span><span class="hs-comment">-- overapproximation on 64bit arch</span><span>
</span><span id="line-332"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_UBX"><span class="hs-identifier hs-type">PUSH_UBX</span></a></span><span> </span><span class="annot"><span class="annottext">Literal
</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621681054766"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054766"><span class="hs-identifier hs-var">nw</span></a></span></span><span class="hs-special">)</span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; Word
forall a b. (Integral a, Num b) =&gt; a -&gt; b
</span><a href="../../base/src/GHC.Real.html#fromIntegral"><span class="hs-identifier hs-var">fromIntegral</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054766"><span class="hs-identifier hs-var">nw</span></a></span><span>
</span><span id="line-333"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_N"><span class="hs-identifier hs-type">PUSH_APPLY_N</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-334"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_V"><span class="hs-identifier hs-type">PUSH_APPLY_V</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-335"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_F"><span class="hs-identifier hs-type">PUSH_APPLY_F</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-336"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_D"><span class="hs-identifier hs-type">PUSH_APPLY_D</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-337"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_L"><span class="hs-identifier hs-type">PUSH_APPLY_L</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-338"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_P"><span class="hs-identifier hs-type">PUSH_APPLY_P</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>        </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-339"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PP"><span class="hs-identifier hs-type">PUSH_APPLY_PP</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-340"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PPP"><span class="hs-identifier hs-type">PUSH_APPLY_PPP</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>      </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-341"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PPPP"><span class="hs-identifier hs-type">PUSH_APPLY_PPPP</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-342"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PPPPP"><span class="hs-identifier hs-type">PUSH_APPLY_PPPPP</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>    </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-343"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PUSH_APPLY_PPPPPP"><span class="hs-identifier hs-type">PUSH_APPLY_PPPPPP</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>   </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-344"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#ALLOC_AP"><span class="hs-identifier hs-type">ALLOC_AP</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-345"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#ALLOC_AP_NOUPD"><span class="hs-identifier hs-type">ALLOC_AP_NOUPD</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>      </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-346"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#ALLOC_PAP"><span class="hs-identifier hs-type">ALLOC_PAP</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>           </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-347"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="GHC.ByteCode.Instr.html#UNPACK"><span class="hs-identifier hs-type">UNPACK</span></a></span><span> </span><span id="local-6989586621681054765"><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054765"><span class="hs-identifier hs-var">sz</span></a></span></span><span class="hs-special">)</span><span>           </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word16 -&gt; Word
forall a b. (Integral a, Num b) =&gt; a -&gt; b
</span><a href="../../base/src/GHC.Real.html#fromIntegral"><span class="hs-identifier hs-var">fromIntegral</span></a></span><span> </span><span class="annot"><span class="annottext">Word16
</span><a href="#local-6989586621681054765"><span class="hs-identifier hs-var">sz</span></a></span><span>
</span><span id="line-348"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#LABEL"><span class="hs-identifier hs-type">LABEL</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>               </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-349"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_I"><span class="hs-identifier hs-type">TESTLT_I</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-350"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_I"><span class="hs-identifier hs-type">TESTEQ_I</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-351"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_W"><span class="hs-identifier hs-type">TESTLT_W</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-352"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_W"><span class="hs-identifier hs-type">TESTEQ_W</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-353"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_F"><span class="hs-identifier hs-type">TESTLT_F</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-354"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_F"><span class="hs-identifier hs-type">TESTEQ_F</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-355"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_D"><span class="hs-identifier hs-type">TESTLT_D</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-356"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_D"><span class="hs-identifier hs-type">TESTEQ_D</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-357"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTLT_P"><span class="hs-identifier hs-type">TESTLT_P</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-358"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#TESTEQ_P"><span class="hs-identifier hs-type">TESTEQ_P</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-359"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#CASEFAIL"><span class="hs-identifier hs-type">CASEFAIL</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>            </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-360"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#JMP"><span class="hs-identifier hs-type">JMP</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>                 </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-361"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#ENTER"><span class="hs-identifier hs-type">ENTER</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>               </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-362"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#RETURN"><span class="hs-identifier hs-type">RETURN</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>              </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-363"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#RETURN_UBX"><span class="hs-identifier hs-type">RETURN_UBX</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>          </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span>
</span><span id="line-364"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#CCALL"><span class="hs-identifier hs-type">CCALL</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>               </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-365"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#SWIZZLE"><span class="hs-identifier hs-type">SWIZZLE</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>             </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-366"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#BRK_FUN"><span class="hs-identifier hs-type">BRK_FUN</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>             </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-367"></span><span>
</span><span id="line-368"></span><span class="hs-comment">-- These insns actually reduce stack use, but we need the high-tide level,</span><span>
</span><span id="line-369"></span><span class="hs-comment">-- so can't use this info.  Not that it matters much.</span><span>
</span><span id="line-370"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#SLIDE"><span class="hs-identifier hs-type">SLIDE</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>               </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-371"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#MKAP"><span class="hs-identifier hs-type">MKAP</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>                </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-372"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#MKPAP"><span class="hs-identifier hs-type">MKPAP</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>               </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">0</span></span><span>
</span><span id="line-373"></span><span class="annot"><a href="GHC.ByteCode.Instr.html#bciStackUse"><span class="hs-identifier hs-var">bciStackUse</span></a></span><span> </span><span class="annot"><a href="GHC.ByteCode.Instr.html#PACK"><span class="hs-identifier hs-type">PACK</span></a></span><span class="hs-special">{</span><span class="hs-special">}</span><span>                </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Word
</span><span class="hs-number">1</span></span><span> </span><span class="hs-comment">-- worst case is PACK 0 words</span><span>
</span><span id="line-374"></span></pre></body></html>